Komputer for Alle 2001 #16/2001 CD 16 (Black).iso/K-CS.DCR/00263.ls

Text File | 2001-10-25 | 450 b | 22 lines

global CatPunk

on new me
  set CatPunk to -1
  set the visible of sprite 98 to 1
  set the visible of sprite 99 to 1
  set the visible of sprite 82 to 1
  set the visible of sprite 94 to 1
end

on exitFrame
  if CatPunk >= 0 then
    set the memberNum of sprite 12 to (CatPunk / 2) + 481
    set CatPunk to CatPunk + 1
    if CatPunk >= 31 then
      set the memberNum of sprite 12 to 481
      set CatPunk to -1
    end if
  end if
  go(#loop)
end